x=c(1,3,5,7,9,10,40,42,43,44,46,47,48,50,51,49)
sample(x,9)
sum(x)
for (k in 1:495) sample(x,9)
y=matrix(rep(0,495*9),nrow=495,ncol=9,byrow=T)
for (k in 1:495) y[k,]=sample(x,9)
y[495,]
